home *** CD-ROM | disk | FTP | other *** search
- /******************************************************************************
- *
- * NSSDC/CDF Header file for CDFconvert.
- *
- * Version 1.0, 25-Feb-92, ST Systems (STX)
- *
- * Modification history:
- *
- * V1.0 25-Feb-92, J Love Original version.
- *
- ******************************************************************************/
-
- /******************************************************************************
- * Function Prototypes.
- ******************************************************************************/
-
- #if defined(vms) | defined(__MSDOS__)
- Boolean StatusHandler (char *, CDFstatus);
- Boolean ConvertCDF (char *, char *);
- Boolean ConvertAttributes (void);
- Boolean ConvertVariables (long, long);
- void ROWtoCOL (void *, void *, long, long *, long);
- void COLtoROW (void *, void *, long, long *, long);
- #endif
-
- #if defined(unix)
- Boolean StatusHandler ();
- Boolean ConvertCDF ();
- Boolean ConvertAttributes ();
- Boolean ConvertVariables ();
- void ROWtoCOL ();
- void COLtoROW ();
- #endif
-
- /******************************************************************************
- * Increment to next set of indices, column majority.
- ******************************************************************************/
-
- #define INCRindicesCOL(numDims,dimSizes,indices) { \
- int _z_; \
- for (_z_ = 0; _z_ < numDims; _z_++) { \
- if (indices[_z_] == dimSizes[_z_] - 1) \
- indices[_z_] = 0; \
- else { \
- indices[_z_]++; \
- break; \
- } \
- } \
- }
-
- /******************************************************************************
- * Increment to next set of indices, row majority.
- ******************************************************************************/
-
- #define INCRindicesROW(numDims,dimSizes,indices) { \
- int _z_; \
- for (_z_ = numDims - 1; _z_ >= 0; _z_--) { \
- if (indices[_z_] == dimSizes[_z_] - 1) \
- indices[_z_] = 0; \
- else { \
- indices[_z_]++; \
- break; \
- } \
- } \
- }
-
- /******************************************************************************
- * Convert string to uppercase.
- ******************************************************************************/
-
- #define Upcase(string) { \
- int _i_; \
- for (_i_ = 0; string[_i_] != NUL; _i_++) \
- if (islower(string[_i_])) string[_i_] = toupper(string[_i_]); \
- }
-